WaveInNumOfDevices
(Property)
Purpose: Returns the number of Wave-in devices available.
Syntax: IntVar = CtlName.WaveInNumOfDevices.
Arguments: None.
Example:
'Fill a ComboBox with Wave-In devices
Dim
intTemp
As
Integer
For
intTemp
=
0
To
SoundCard1.WaveInNumOfDevices
____Combo1.AddItem
SoundCard1.WaveInGetDeviceName (intTemp)
Next intTemp
Comments: WaveInNumOfDevices is zerobased. Property is Read Only.
See Also:
WaveInGetDeviceName
WaveOutNumOfDevices
WaveOutGetDeviceName